home *** CD-ROM | disk | FTP | other *** search
/ Interactive Media Design Review 1999 / Interactive Media Design Review 1999.iso / pc / allfiles / angry / tomas.dir / 00004_Script_4 < prev    next >
Text File  |  1999-03-01  |  1KB  |  60 lines
  1.  
  2. property WhichBut, Destination, DestType, TargetFrame
  3.  
  4. global pointy, pointym, currentPups
  5.  
  6. on mouseDown
  7.   
  8.   cursor -1
  9.   
  10.   case (WhichBut) of:
  11.     "next", "last":
  12.       if DestType = "Movie" then
  13.         puppetSound 1, 0
  14.         puppetSound 2, 0
  15.         if TargetFrame = "none" then go to movie Destination
  16.         else go to frame TargetFrame of movie Destination
  17.         
  18.       else
  19.         autoPuppet currentPups, FALSE
  20.         puppetSound 2, 0
  21.         go to frame Destination
  22.       end if
  23.       
  24.     "main":
  25.       clearGlobals
  26.       puppetSound 1, 0
  27.       puppetSound 2, 0
  28.       go to frame "welcomeBack" of movie "intro"
  29.   end case
  30.   
  31. end
  32.  
  33.  
  34. on mouseWithin
  35.   cursor [pointy, pointym]
  36. end
  37.  
  38. on mouseLeave
  39.   cursor -1
  40. end
  41.  
  42.  
  43. on getPropertyDescriptionList
  44.   set p_list = [¼
  45.     #WhichBut:      [ #comment:  "Which type of Button:",¼
  46.                        #format:  #string,¼
  47.                       #default: "next"],¼
  48.     #Destination:   [ #comment: "Destination:",¼
  49.                        #format: #string,¼
  50.                       #default: "tomas02"],¼
  51.     #DestType:      [ #comment: "Movie or Frame?:",¼
  52.                        #format: #string,¼
  53.                       #default: "Movie"],¼
  54.     #TargetFrame:   [ #comment: "Frame target:",¼
  55.                        #format: #string,¼
  56.                       #default: "none"]¼
  57.   ]
  58.   
  59.   return p_list
  60. end